


************	
** FIGURE A3
************


* Generate empty dataset where summary statistics can be stored
clear
set obs 6
gen case = _n
gen case_label = "Bulgaria (EP)" if case == 1
replace case_label = "Greece (EP)" if case == 2
replace case_label = "Romania (EP)" if case == 3
replace case_label = "Spain (EP)" if case == 4
replace case_label = "UK (EP)" if case == 5
replace case_label = "UK (GE)" if case == 6
gen case_label2 = "BG_EP" if case == 1
replace case_label2 = "GR_EP" if case == 2
replace case_label2 = "RO_EP" if case == 3
replace case_label2 = "ESP_EP" if case == 4
replace case_label2 = "UK_EP" if case == 5
replace case_label2 = "UK_GE" if case == 6
gen age_no = .
gen age_yes = .
gen female_no = .
gen female_yes = .
gen degree_no = .
gen degree_yes = .
gen highint_no = .
gen highint_yes = .
gen lr_no = .
gen lr_yes = .
gen undecided_no = .
gen undecided_yes = .
gen issue_no = .
gen issue_yes = .
gen congruent_no = .
gen congruent_yes = .

* Calculate means for opt-in takers and non-takers and save
foreach case in BG_EP GR_EP RO_EP ESP_EP UK_EP UK_GE {
preserve
import delimited "`case'.csv", clear case(preserve)
sum age2 if pickone_voter == 1 & optin_completed == 0
local age_no = `r(mean)'
sum age2 if pickone_voter == 1 & optin_completed == 1
local age_yes = `r(mean)'
sum gender_female if pickone_voter == 1 & optin_completed == 0
local female_no = `r(mean)'
sum gender_female if pickone_voter == 1 & optin_completed == 1
local female_yes = `r(mean)'
sum degree if pickone_voter == 1 & optin_completed == 0
local degree_no = `r(mean)'
sum degree if pickone_voter == 1 & optin_completed == 1
local degree_yes = `r(mean)'
sum high_interest if pickone_voter == 1 & optin_completed == 0
local highint_no = `r(mean)'
sum high_interest if pickone_voter == 1 & optin_completed == 1
local highint_yes = `r(mean)'
sum selfPlace_LR if pickone_voter == 1 & optin_completed == 0
local lr_no = `r(mean)'
sum selfPlace_LR if pickone_voter == 1 & optin_completed == 1
local lr_yes = `r(mean)'
sum undecided if pickone_voter == 1 & optin_completed == 0
local undecided_no = `r(mean)'
sum undecided if pickone_voter == 1 & optin_completed == 1
local undecided_yes = `r(mean)'
sum issue_voter if pickone_voter == 1 & optin_completed == 0
local issue_no = `r(mean)'
sum issue_voter if pickone_voter == 1 & optin_completed == 1
local issue_yes = `r(mean)'
gen congruent_advice = 0
replace congruent_advice = 1 if ranked_advice == 1 & voteint == 1
bysort id: egen congruent_advice2 = max(congruent_advice)
sum congruent_advice2 if pickone_voter == 1 & optin_completed == 0
local congruent_no = `r(mean)'
sum congruent_advice2 if pickone_voter == 1 & optin_completed == 1
local congruent_yes = `r(mean)'
restore
replace age_no = `age_no' if case_label2 == "`case'" 
replace age_yes = `age_yes' if case_label2 == "`case'" 
replace female_no = `female_no' if case_label2 == "`case'" 
replace female_yes = `female_yes' if case_label2 == "`case'" 
replace degree_no = `degree_no' if case_label2 == "`case'" 
replace degree_yes = `degree_yes' if case_label2 == "`case'" 
replace highint_no = `highint_no' if case_label2 == "`case'" 
replace highint_yes = `highint_yes' if case_label2 == "`case'" 
replace lr_no = `lr_no' if case_label2 == "`case'" 
replace lr_yes = `lr_yes' if case_label2 == "`case'" 
replace undecided_no = `undecided_no' if case_label2 == "`case'" 
replace undecided_yes = `undecided_yes' if case_label2 == "`case'" 
replace issue_no = `issue_no' if case_label2 == "`case'" 
replace issue_yes = `issue_yes' if case_label2 == "`case'" 
replace congruent_no = `congruent_no' if case_label2 == "`case'" 
replace congruent_yes = `congruent_yes' if case_label2 == "`case'" 
}

* Case labels
labmask case, values(case_label)

* Convert female share to %
replace female_no = female_no * 100
replace female_yes = female_yes * 100

* Convert degree share to %
replace degree_no = degree_no * 100
replace degree_yes = degree_yes * 100

* Convert high pol interest share to %
replace highint_no = highint_no * 100
replace highint_yes = highint_yes * 100

* Convert undecided share to %
replace undecided_no = undecided_no * 100
replace undecided_yes = undecided_yes * 100

* Convert issue voter share to %
replace issue_no = issue_no * 100
replace issue_yes = issue_yes * 100

* Convert congruent advice share to %
replace congruent_no = congruent_no * 100
replace congruent_yes = congruent_yes * 100

* Graph: Age
twoway (scatter case age_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case age_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(20(20)80, axis(1) labsize(2.25) ticks) ///
	xlabel(20(20)80, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Age (years)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))
	
* Graph: Female
twoway (scatter case female_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case female_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(25(25)100, axis(1) labsize(2.25) ticks) ///
	xlabel(25(25)100, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Female (%)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))
	
* Graph: Degree
twoway (scatter case degree_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case degree_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(25(25)100, axis(1) labsize(2.25) ticks) ///
	xlabel(25(25)100, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Degree (%)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))
	
* Graph: High political interest share
twoway (scatter case highint_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case highint_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(25(25)100, axis(1) labsize(2.25) ticks) ///
	xlabel(25(25)100, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("High political interest (%)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))

* Graph: Left-right
twoway (scatter case lr_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case lr_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(0(5)10, axis(1) labsize(2.25) ticks) ///
	xlabel(0(5)10, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Left-right (0-10)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))

* Graph: Undecided
twoway (scatter case undecided_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case undecided_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(0(25)100, axis(1) labsize(2.25) ticks) ///
	xlabel(0(25)100, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Undecided (%)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))

* Graph: Issue voter
twoway (scatter case issue_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case issue_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(0(25)100, axis(1) labsize(2.25) ticks) ///
	xlabel(0(25)100, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Issue voter (%)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))

* Graph: Congruent advice
twoway (scatter case congruent_yes, mcolor(blue) msymbol(D) yaxis(1 2) xaxis (1 2) msize(small))  ///
	(scatter case congruent_no, mcolor(red) msymbol(S) msize(small)), /// 
	yscale(range(1 6) axis(1 2) reverse) xscale(axis(1 2)) ///
	ylabel(1(1)6, axis(1) gmin gmax labsize(2.25) glwidth(medthin) valuelabel angle(horizontal) ticks) ///
	ylabel(1(1)6, axis(2) gmin gmax nolabels ticks) ///
	xlabel(0(25)100, axis(1) labsize(2.25) ticks) ///
	xlabel(0(25)100, axis(2) nolabels ticks) ///
	ytitle("", axis(1)) ytitle("", axis(2)) ///
	xtitle("", axis(1) size(small)) ///
	xtitle("", axis(2)) ///
	title("Congruent advice (%)", size(medsmall)) ///
	legend( order(1 2) label(1 "Mean if opt-in completed") label(2 "Mean if not completed") cols(1) pos(6) region(lstyle(none) lcolor(white)) size(2.25))  ///
	xsize(4) ysize(5) scale(*1.8) scheme(s2mono) graphregion(fcolor(white) ilcolor(white) lcolor(white))







***********
** TABLE A3
***********

* Relationship between treatment group status and agreement scores
foreach case in BG_EP GR_EP RO_EP ESP_EP UK_EP UK_GE {
di "Case = `case'"
import delimited "`case'.csv", clear case(preserve)
levelsof party, local(parties)
foreach p of local parties {
gen temp = advice if party == "`p'"
bysort id: egen advice_`p' = mean(temp)
* Means by treatment status
bysort treat: sum advice_`p' if optin_completed == 1 & pickone_voter == 1
drop temp
}
* Overall F-test
if "`case'" == "UK_EP" {
drop advice_SNP advice_PLAID
}
if "`case'" == "UK_GE" {
drop advice_SNP advice_Plaid
}
reg treat advice_* if optin_completed == 1 & pickone_voter == 1
}




***********
** TABLE A4
***********

* Time spent until results screen, by treatment group status
foreach case in BG_EP GR_EP RO_EP ESP_EP UK_EP UK_GE {
di "Case = `case'"
import delimited "`case'.csv", clear case(preserve)
tabstat timetoresultsscreen if pickone_voter == 1, by(treat) stats(median)
}




***********
** TABLE A5
***********


* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1, cl(id)

* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1, cl(id)

* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1, cl(id)

* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1, cl(id)
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1, cl(id)

* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1, cl(id)
	

	


***********
** TABLE A6
***********

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1, cl(id)
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age if optin_completed == 1, cl(id)
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age if optin_completed == 1, cl(id)
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1, cl(id)
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1, cl(id)
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1, cl(id)



	
***********
** TABLE A7
***********

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1, cl(id)
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1, cl(id)
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1, cl(id)
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1, cl(id)
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1, cl(id)
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1, cl(id)

	
	


***********
** TABLE A8
***********

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1, cl(id)
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1, cl(id)
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1, cl(id)
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1, cl(id)
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1, cl(id)
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1, cl(id)




	
***********
** TABLE A9
***********

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1, cl(id)
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1, cl(id)
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1, cl(id)
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1, cl(id)
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1, cl(id)
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1, cl(id)

	

	
************
** TABLE A10
************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1, cl(id)
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1, cl(id)
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1, cl(id)
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1, cl(id)
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1, cl(id)
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1, cl(id)


	
	
	

	
	
	
************
** FIGURE A4
************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m1
global model = "m1"
global xlabel = "-50(50)50"
global ylabel = "-.8(.4).8"
global title = "Bulgaria (EP)"
qui do "Conditional_Marginal_Effects.do"

* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m2
global model = "m2"
global xlabel = "-50(50)50"
global ylabel = "-.5(.25).5"
global title = "Greece (EP)"
qui do "Conditional_Marginal_Effects.do"

* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m3
global model = "m3"
global xlabel = "-50(50)50"
global ylabel = "-.5(.25).5"
global title = "Romania (EP)"
qui do "Conditional_Marginal_Effects.do"

* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m4
global model = "m4"
global xlabel = "-50(50)50"
global ylabel = "-.5(.25).5"
global title = "Spain (EP)"
qui do "Conditional_Marginal_Effects.do"

* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m5
global model = "m5"
global xlabel = "-100(50)100"
global ylabel = "-.5(.25).5"
global title = "UK (EP)"
qui do "Conditional_Marginal_Effects.do"

* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m6
global model = "m6"
global xlabel = "-100(50)100"
global ylabel = "-.5(.25).5"
global title = "UK (GE)"
qui do "Conditional_Marginal_Effects.do"




************
** FIGURE A5
************

* Average total time & number of racers
foreach case in BG_EP GR_EP RO_EP ESP_EP UK_EP UK_GE {
di "Case = `case'"
import delimited "`case'.csv", clear case(preserve)
sum totaltime if pickone_voter == 1 & optin_completed == 1
local N = `r(N)'
sum id if totaltime < 301 & pickone_voter == 1 & optin_completed == 1
di `r(N)' / `N'
}
** Between 4% (Greece EP) and 18% (Romania EP) of users rushed through tool in 5 minutes or less


* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m1
global model = "m1"
global xlabel = "-50(50)50"
global ylabel = "-.8(.4).8"
global title = "Bulgaria (EP)"
qui do "Conditional_Marginal_Effects.do"

* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m2
global model = "m2"
global xlabel = "-50(50)50"
global ylabel = "-.5(.25).5"
global title = "Greece (EP)"
qui do "Conditional_Marginal_Effects.do"

* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m3
global model = "m3"
global xlabel = "-50(50)50"
global ylabel = "-.5(.25).5"
global title = "Romania (EP)"
qui do "Conditional_Marginal_Effects.do"

* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m4
global model = "m4"
global xlabel = "-50(50)50"
global ylabel = "-.5(.25).5"
global title = "Spain (EP)"
qui do "Conditional_Marginal_Effects.do"

* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m5
global model = "m5"
global xlabel = "-100(50)100"
global ylabel = "-.5(.25).5"
global title = "UK (EP)"
qui do "Conditional_Marginal_Effects.do"

* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m6
global model = "m6"
global xlabel = "-100(50)100"
global ylabel = "-.5(.25).5"
global title = "UK (GE)"
qui do "Conditional_Marginal_Effects.do"



	
************
** FIGURE A6
************

* Install interflex package, if not installed already (remove * to install)
*ssc install interflex

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
interflex ptv treat advice if optin_completed == 1, type(kernel) bw(50) cl(id)
global xlabel = "-50(50)50"
global title = "Bulgaria (EP)"
qui do "Conditional_Marginal_Effects_Kernel.do"

* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
interflex ptv treat advice if optin_completed == 1, type(kernel) bw(50) cl(id)
global xlabel = "-50(50)50"
global title = "Greece (EP)"
qui do "Conditional_Marginal_Effects_Kernel.do"

* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
interflex ptv treat advice if optin_completed == 1, type(kernel) bw(50) cl(id)
global xlabel = "-50(50)50"
global title = "Romania (EP)"
qui do "Conditional_Marginal_Effects_Kernel.do"

* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
interflex ptv treat advice if optin_completed == 1, type(kernel) bw(50) cl(id)
global xlabel = "-50(50)50"
global title = "Spain (EP)"
qui do "Conditional_Marginal_Effects_Kernel.do"

* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
interflex ptv treat advice if optin_completed == 1, type(kernel) bw(50) cl(id)
global xlabel = "-100(50)100"
global title = "UK (EP)"
qui do "Conditional_Marginal_Effects_Kernel.do"

* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
interflex ptv treat advice if optin_completed == 1, type(kernel) bw(50) cl(id)
global xlabel = "-100(50)100"
global title = "UK (GE)"
qui do "Conditional_Marginal_Effects_Kernel.do"




************
** FIGURE A7
************

** Age - Covariates
*******************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum  if optin_completed == 1, cl(id)
estimates store m1
test 1.treat#c.advice#c.age // coef. = -.00007; p = 0.82
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m2
test 1.treat#c.advice#c.age // coef. = -.00003; p = 0.77
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum  if optin_completed == 1, cl(id)
estimates store m3
test 1.treat#c.advice#c.age // coef. = -.0001; p = 0.52
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m4
test 1.treat#c.advice#c.age // coef. = -.00005; p = 0.47
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum  if optin_completed == 1, cl(id)
estimates store m5
test 1.treat#c.advice#c.age // coef. = -.00005; p = 0.12
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 gender_female degree high_interest selfPlace_LR voteint undecided issue_voter i.partynum  if optin_completed == 1, cl(id)
estimates store m6
test 1.treat#c.advice#c.age // coef. = -.00004; p = 0.36



** Education - Covariates
*************************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree age2 gender_female high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m1
test 1.treat#c.advice#1.degree // coef. = -.009; p = 0.31
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree age2 gender_female high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m2
test 1.treat#c.advice#1.degree // coef. = -.003; p = 0.35
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree age2 gender_female high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m3
test 1.treat#c.advice#1.degree // coef. = -.002; p = 0.60
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree age2 gender_female high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m4
test 1.treat#c.advice#1.degree // coef. = -.001; p = 0.50
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree age2 gender_female high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m5
test 1.treat#c.advice#1.degree // coef. = .0003; p = 0.76
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree age2 gender_female high_interest selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m6
test 1.treat#c.advice#1.degree // coef. = -0.0002; p = 0.92



** Political interest - Covariates
**********************************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest age2 gender_female degree selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m1
test 1.treat#c.advice#1.high_interest // coef. = -.004; p = 0.50
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest age2 gender_female degree selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m2
test 1.treat#c.advice#1.high_interest // coef. = -.007; p = 0.01
global model = "m2"
global title = "Interest - Greece (EP)"
global x = "high_interest"
global xlow = "Low interest"
global xhigh = "High interest"
global xlabel = "-50(50)50"
global marginright = "22"
qui do "Three_Way_Interactions.do"
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest age2 gender_female degree selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m3
test 1.treat#c.advice#1.high_interest // coef. = .003; p = 0.28
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest age2 gender_female degree selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m4
test 1.treat#c.advice#1.high_interest // coef. = .001; p = 0.72
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest age2 gender_female degree selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m5
test 1.treat#c.advice#1.high_interest // coef. = -.0006; p = 0.51
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest age2 gender_female degree selfPlace_LR voteint undecided issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m6
test 1.treat#c.advice#1.high_interest // coef. = -.004; p = 0.004
estimates store m6
global model = "m6"
global title = "Interest - UK (GE)"
global x = "high_interest"
global xlow = "Low interest"
global xhigh = "High interest"
global xlabel = "-100(50)100"
global marginright = "22"
qui do "Three_Way_Interactions.do"



** Undecided - Covariates
*************************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided age2 gender_female degree high_interest selfPlace_LR voteint issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m1
test 1.treat#c.advice#1.undecided // coef. = .02; p = 0.047
global model = "m1"
global title = "Undecided - Bulgaria (EP)"
global x = "undecided"
global xlow = "Decided"
global xhigh = "Undecided"
global xlabel = "-50(50)50"
global marginright = "20"
qui do "Three_Way_Interactions.do"

* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided age2 gender_female degree high_interest selfPlace_LR voteint issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m2
test 1.treat#c.advice#1.undecided // coef. = .002; p = 0.69
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided age2 gender_female degree high_interest selfPlace_LR voteint issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m3
test 1.treat#c.advice#1.undecided // coef. = .003; p = 0.79
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided age2 gender_female degree high_interest selfPlace_LR voteint issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m4
test 1.treat#c.advice#1.undecided // coef. = .009; p = 0.03
global model = "m4"
global title = "Undecided - Spain (EP)"
global x = "undecided"
global xlow = "Decided"
global xhigh = "Undecided"
global xlabel = "-50(50)50"
global marginright = "22"
qui do "Three_Way_Interactions.do"
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided age2 gender_female degree high_interest selfPlace_LR voteint issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m5
test 1.treat#c.advice#1.undecided // coef. = 0.001; p = 0.40
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided age2 gender_female degree high_interest selfPlace_LR voteint issue_voter i.partynum if optin_completed == 1, cl(id)
estimates store m6
global model = "m6"
test 1.treat#c.advice#1.undecided // coef. = .006; p = 0.02
global title = "Undecided - UK (GE)"
global x = "undecided"
global xlow = "Decided"
global xhigh = "Undecided"
global marginright = "22"
qui do "Three_Way_Interactions.do"



** Issue voter - Covariates
***************************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter age2 gender_female degree high_interest selfPlace_LR voteint undecided i.partynum if optin_completed == 1, cl(id)
estimates store m1
test 1.treat#c.advice#1.issue_voter // coef. = -.01; p = 0.09
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter age2 gender_female degree high_interest selfPlace_LR voteint undecided i.partynum if optin_completed == 1, cl(id)
estimates store m2
test 1.treat#c.advice#1.issue_voter // coef. = -.004; p = 0.15
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter age2 gender_female degree high_interest selfPlace_LR voteint undecided i.partynum if optin_completed == 1, cl(id)
estimates store m3
test 1.treat#c.advice#1.issue_voter // coef. = .001; p = 0.70
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter age2 gender_female degree high_interest selfPlace_LR voteint undecided i.partynum if optin_completed == 1, cl(id)
estimates store m4
test 1.treat#c.advice#1.issue_voter // coef. = -.002; p = 0.40
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter age2 gender_female degree high_interest selfPlace_LR voteint undecided i.partynum if optin_completed == 1, cl(id)
estimates store m5
test 1.treat#c.advice#1.issue_voter // coef. = -.002; p = 0.02
global model = "m5"
global title = "Issue Voter - UK (EP)"
global x = "issue_voter"
global xlow = "No issue voter"
global xhigh = "Issue voter"
global xlabel = "-100(50)100"
global marginright = "22"
qui do "Three_Way_Interactions.do"
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter age2 gender_female degree high_interest selfPlace_LR voteint undecided i.partynum if optin_completed == 1, cl(id)
estimates store m6
test 1.treat#c.advice#1.issue_voter // coef. = .0009; p = 0.50




************
** FIGURE A8
************

** Age - Speeders
*****************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m1
test 1.treat#c.advice#c.age // coef. = 0.0006; p = 0.18
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m2
test 1.treat#c.advice#c.age // coef. = <0.001; p = 0.88
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m3
test 1.treat#c.advice#c.age // coef. = -0.0002; p = 0.26
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m4
test 1.treat#c.advice#c.age // coef. = >-0.0001; p = 0.33
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m5
test 1.treat#c.advice#c.age // coef. = >-0.001; p = 0.044
global model = "m5"
global title = "Age - UK (EP)"
global x = "age2"
global xlo = "20"
global xhi = "65"
global xlow = "Age = 20"
global xhigh = "Age = 65"
global xlabel = "-100(50)100"
global marginright = "22"
qui do "Three_Way_Interactions_Continuous.do"
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##c.age2 if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m6
test 1.treat#c.advice#c.age // coef. = >-0.001; p = 0.48



** Education - Speeders
***********************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m1
test 1.treat#c.advice#1.degree // coef. = 0.01; p = 0.29
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m2
test 1.treat#c.advice#1.degree // coef. = 0.004; p = 0.29
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m3
test 1.treat#c.advice#1.degree // coef. = 0.002; p = 0.60
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m4
test 1.treat#c.advice#1.degree // coef. = -0.004; p = 0.06
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m5
test 1.treat#c.advice#1.degree // coef. = 0.0004; p = 0.72
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.degree if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m6
test 1.treat#c.advice#1.degree // coef. = -0.001; p = 0.48



** Political interest - Speeders
********************************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m1
test 1.treat#c.advice#1.high_interest // coef. = -0.01; p = 0.16
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m2
test 1.treat#c.advice#1.high_interest // coef. = -0.009; p = 0.01
global model = "m2"
global title = "Interest - Greece (EP)"
global x = "high_interest"
global xlow = "Low interest"
global xhigh = "High interest"
global xlabel = "-50(50)50"
global marginright = "22"
qui do "Three_Way_Interactions.do"
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m3
test 1.treat#c.advice#1.high_interest // coef. = 0.0006; p = 0.87
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m4
test 1.treat#c.advice#1.high_interest // coef. = -0.0006; p = 0.82
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m5
test 1.treat#c.advice#1.high_interest // coef. = -0.0002; p = 0.79
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.high_interest if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m6
test 1.treat#c.advice#1.high_interest // coef. = -0.005; p = 0.005
estimates store m6
global model = "m6"
global title = "Interest - UK (GE)"
global x = "high_interest"
global xlow = "Low interest"
global xhigh = "High interest"
global xlabel = "-100(50)100"
global marginright = "22"
qui do "Three_Way_Interactions.do"



** Undecided - Speeders
***********************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m1
test 1.treat#c.advice#1.undecided // coef. = 0.017; p = 0.12
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m2
test 1.treat#c.advice#1.undecided // coef. = 0.003; p = 0.52
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m3
test 1.treat#c.advice#1.undecided // coef. = 0.009; p = 0.27
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m4
test 1.treat#c.advice#1.undecided // coef. = 0.009; p = 0.014
global model = "m4"
global title = "Undecided - Spain (EP)"
global x = "undecided"
global xlow = "Decided"
global xhigh = "Undecided"
global xlabel = "-50(50)50"
global marginright = "22"
qui do "Three_Way_Interactions.do"
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m5
test 1.treat#c.advice#1.undecided // coef. = 0.001; p = 0.28
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.undecided if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m6
test 1.treat#c.advice#1.undecided // coef. = 0.008; p = 0.001
global model = "m6"
global title = "Undecided - UK (GE)"
global x = "undecided"
global xlow = "Decided"
global xhigh = "Undecided"
global marginright = "22"
qui do "Three_Way_Interactions.do"




** Issue voter - Speeders
*************************

* BG (EP)
import delimited "BG_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m1
test 1.treat#c.advice#1.issue_voter // coef. = -0.012; p = 0.19
	
* GR (EP)
import delimited "GR_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m2
test 1.treat#c.advice#1.issue_voter // coef. = -0.006; p = 0.11
	
* RO (EP)
import delimited "RO_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m3
test 1.treat#c.advice#1.issue_voter // coef. = <0.001; p = 0.92
	
* ESP (EP)
import delimited "ESP_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m4
test 1.treat#c.advice#1.issue_voter // coef. = -0.004; p = 0.11
	
* UK (EP)
import delimited "UK_EP.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m5
test 1.treat#c.advice#1.issue_voter // coef. = -0.003; p = 0.02
global model = "m5"
global title = "Issue Voter - UK (EP)"
global x = "issue_voter"
global xlow = "No issue voter"
global xhigh = "Issue voter"
global xlabel = "-100(50)100"
global marginright = "22"
qui do "Three_Way_Interactions.do"
	
* UK (GE)
import delimited "UK_GE.csv", clear case(preserve)
reg ptv i.treat##c.advice##i.issue_voter if optin_completed == 1 & totaltime > 300, cl(id)
estimates store m6
test 1.treat#c.advice#1.issue_voter // coef. = 0.0003; p = 0.82
